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DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 
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FACILITY: F11ACP STRUCTURE LEVEL 1 
ABSTRACT: 
THIS ROUTINE MAPS THE GIVEN VIRTUAL BLOCK(S) INTO THE 


CORRESPONDING LOGICAL BLOCKS. 

ENVIRONMENT: 
STARLET OPERATING SYSTEN, INCLUDING PRIVILEGED SYSTEM SERVICES 
AND INTERNAL EXEC ROUTINES. THIS ROUTINE MUST BE EXECUTED IN 


KERNEL MODE. 
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AUTHOR: ANDREW C. GOLDSTEIN, CREATION DATE: 3-MAR-1977 11:15 
MODIFIED BY: 
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INCLUDE FILES: 
- INCLUDE FCPDEF .MAR 
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EQUATED SYMBOLS: 
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35 } AP OFFSETS 
60 ; 


00000004 VBN 4 ; DESIRED VBN 
00000008 4 ADDRESS 
BLOCK COUNT TO 


0000000¢ MAP 
00000010 ADDRESS OF LONGWORD TO STORE 
COUNT OF UNMAPPED BLOCKS 


SWCBDEF ; DEFINE WINDOW STRUCTURE 
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FUNCTIONAL DESCRIPTION: 


THIS ROUTINE MAPS THE GIVEN VIRTUAL BLOCK(S) INTO THE 
CORRESPONDING LOGICAL BLOCKS. 


CALLING SEQUENCE: 
CALL MAP_WINDOW (ARG1, ARG2, ARG3, ARG4) 


INPUT PARAMETERS: 
ARG: DE 


: DESIRED VBN 
ARG2: ADDRESS OF WINDOW TO USE 
ARGS: NUMBER OF BLOCKS TO MAP 


IMPLICIT INPUTS: 
CURRENT_UCB CONTAINS UCB ADDRESS OF UNIT IN PROCESS 


OUTPUT PARAMETERS: 
ARG4: ADDRESS OF LONGWORD TO RECEIVE UNMAPPED COUNT 


IMPLICIT OUTPUTS: 
NONE 

ROUTINE VALUE: 
LBN IF ANY BLOCKS MAPPED 
-1 IF NONE MAPPED 


SIDE EFFECTS: 
NONE 


-PSECT SCODES,NOWRT,LONG 


MAP_WINDOW: : 
“WORD “M<R2,R3,R4,R5> ; SAVE REGISTERS 
MOVL WINDOWC(AP) ,R2 : GET WINDOW ADDRESS 
MOVL  W*CURRENT_UCB.RS : GET UCB ADDRESS FOR MAPPER 


10$:  MOVL VBN(AP),RO > GET VBN 
ASHL  #9,COUNT(AP),R1 : GET EXPLICIT COUNT 

208: a# {OC $MAPVBLK : CALL SYSTEM MAPPING ROUTINE 

RO, 40$ + BRANCH IF NO MAP 


" SUCCESSFUL MAP - RETURN LBN AND COUNT OF UNMAPPED BLOCKS IF WANTED 
: MOVL _R1, RO : LBN TO ROUTINE VALUE 
ASHL  #-9,R2,@UNMAPPED (AP) > STORE RESULT 
30$: RET : AND RETURN 
+ WE GET HERE IF THE MAP FAILS COMPLETELY. RETURN -1 AS VALUE. 


40s: MOVL COUNT(AP) ,@UNMAPPED(AP) ; RETURN ENTIRE COUNT AS UNMAPPED 
“5 #1,R0 ; VALUE = -1 
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MPWIND 
Symbol table 


Initialization 
Command processing 


Pass 
Symbol table sort 
Pass 2 

Symbol table output 
Psect synopsis output 
Cross-reference output 
Assembler run totals 


The working set Limit was 1050 
6379 bytes (13 pages) of virtua 
There were 1 


232 source Lines were read in Pass 


Page faults 
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SHINS 


teeerree x 02 
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Allocation PSECT No. Attributes 
00000000 ( 0.) 00 ¢ OO.) NOPIC 
44444 ( 0.) O1¢ 1.) NOPIC 
00000030 (« 48.) 02 ¢ 2.) NOPIC 
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Lapsed Time 


138 90280200-08 00:00:01 .23 
142 0:00; 1.64 00:00:06-04 
58 $8:00:00:07  90:99:00:03 
(BBS BB: 
0 0: 00:0 0:00:00.00 
364 80:09; 2 Boob 4a 86 
ages. 


USR 
USR 
USR 


"SSEp=1986 Ot :06:98 EPTTAtSaC 


CON ABS LCL NOSHR NOEXE 
CON ABS LCL NOSHR- EXE 
CON REL LCL NOSHR- EXE 


memory were used to buffer the intermediate cod 


pages of symbol table space allocated to hold 97 non-local and 
object records in Pass 2 


+ producing 


pages of virtual memory were used to define 11 macros. 


ode. 
4 local symbols. 


cro Vv04-00 
MPWIND.MAR; 1 


NORD NOWRT NOVEC BYTE 
RD WRT NOVEC BYTE 
RD NOWRT NOVEC LONG 
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MPI 
VAX=-11 Macro Run Statistics 1A.SRCJMPWIND.MAR; 1 
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; Macro library statistics ' 


eeecece mor ee es ae sce emeee nant 


Macro Library name Macros defined 
SDUA SYS.OBJJLIB.MLB;1 1 
Rtittinyts Svs 08 STARLET.MLB;2 3 
TOTALS (all Libraries) 4 


139 GETS were required to define 4 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:MPWIND/OBJ=0BJ$:MPWIND MSRC$:F CPPRE/UPDATE=(ENH$:F CPPRE) +MSRC$:MPWIND/UPDATE=(ENHS:MPWIND) *EXECMI.$/LIB 
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